(* Content-type: application/vnd.wolfram.mathematica *)

(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)

(* CreatedBy='Mathematica 8.0' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       157,          7]
NotebookDataLength[     30395,        758]
NotebookOptionsPosition[     28330,        683]
NotebookOutlinePosition[     28675,        698]
CellTagsIndexPosition[     28632,        695]
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{

Cell[CellGroupData[{
Cell[BoxData[{
 RowBox[{"r10", "=", " ", 
  RowBox[{"{", "2010", "}"}]}], "\[IndentingNewLine]", 
 RowBox[{"r11", "=", 
  RowBox[{"{", "2011", "}"}]}], "\[IndentingNewLine]", 
 RowBox[{"mes", "=", " ", 
  RowBox[{"{", 
   RowBox[{
   "Jan", ",", " ", "Feb", ",", " ", "Mar", ",", " ", "Apr", ",", " ", "May", 
    ",", " ", "Jun", ",", " ", "Jul", ",", " ", "Aug", ",", " ", "Sep", ",", 
    " ", "Oct", ",", " ", "Nov", ",", " ", "Dec"}], "}"}]}]}], "Input",
 CellChangeTimes->{{3.544334766369*^9, 3.544335001092*^9}, {3.544335034177*^9,
   3.5443351014969997`*^9}, {3.5443357855620003`*^9, 
  3.5443357942200003`*^9}, {3.544335824715*^9, 3.5443358522390003`*^9}}],

Cell[BoxData[
 RowBox[{"{", "2010", "}"}]], "Output",
 CellChangeTimes->{{3.544334813258*^9, 3.544334847666*^9}, 
   3.5443350050480003`*^9, 3.5443350484700003`*^9, {3.5443350906289997`*^9, 
   3.544335102466*^9}, 3.544335853699*^9}],

Cell[BoxData[
 RowBox[{"{", "2011", "}"}]], "Output",
 CellChangeTimes->{{3.544334813258*^9, 3.544334847666*^9}, 
   3.5443350050480003`*^9, 3.5443350484700003`*^9, {3.5443350906289997`*^9, 
   3.544335102466*^9}, 3.544335853705*^9}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
  "Jan", ",", "Feb", ",", "Mar", ",", "Apr", ",", "May", ",", "Jun", ",", 
   "Jul", ",", "Aug", ",", "Sep", ",", "Oct", ",", "Nov", ",", "Dec"}], 
  "}"}]], "Output",
 CellChangeTimes->{{3.544334813258*^9, 3.544334847666*^9}, 
   3.5443350050480003`*^9, 3.5443350484700003`*^9, {3.5443350906289997`*^9, 
   3.544335102466*^9}, 3.544335853724*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"DE2010", " ", "=", " ", 
  RowBox[{"{", 
   RowBox[{
   "3.26", " ", ",", " ", "3.17", ",", " ", "3.10", ",", " ", "3.06", ",", 
    " ", "2.73", ",", " ", "2.54", ",", " ", "2.62", ",", " ", "2.35", ",", 
    "2.30", ",", "2.35", ",", " ", "2.53", ",", " ", "2.91"}], 
   "}"}]}], "\[IndentingNewLine]", 
 RowBox[{"DE2011", "=", 
  RowBox[{"{", 
   RowBox[{
   "3.02", ",", " ", "3.20", ",", " ", "3.21", ",", "3.34", ",", " ", "3.06", 
    ",", " ", "2.89", ",", " ", "2.74", ",", " ", "2.21", ",", " ", "1.83", 
    ",", " ", "2", ",", " ", "1.87", ",", " ", "1.93"}], "}"}]}]}], "Input",
 CellChangeTimes->{{3.544335730061*^9, 3.544335732262*^9}, {
  3.5443405040690002`*^9, 3.544340507795*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
  "3.26`", ",", "3.17`", ",", "3.1`", ",", "3.06`", ",", "2.73`", ",", 
   "2.54`", ",", "2.62`", ",", "2.35`", ",", "2.3`", ",", "2.35`", ",", 
   "2.53`", ",", "2.91`"}], "}"}]], "Output",
 CellChangeTimes->{
  3.5443351054519997`*^9, 3.544335732795*^9, {3.54434050556*^9, 
   3.5443405139639997`*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
  "3.02`", ",", "3.2`", ",", "3.21`", ",", "3.34`", ",", "3.06`", ",", 
   "2.89`", ",", "2.74`", ",", "2.21`", ",", "1.83`", ",", "2", ",", "1.87`", 
   ",", "1.93`"}], "}"}]], "Output",
 CellChangeTimes->{
  3.5443351054519997`*^9, 3.544335732795*^9, {3.54434050556*^9, 
   3.544340513972*^9}}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"GR2010", "=", " ", 
  RowBox[{"{", 
   RowBox[{
   "6.02", ",", "6.46", ",", "6.24", ",", "7.83", ",", "7.97", ",", "9.1", 
    ",", " ", "10.34", ",", " ", "10.70", ",", " ", "11.34", ",", " ", "9.57",
     ",", " ", "11.52", ",", "12.01"}], "}"}]}], "\[IndentingNewLine]", 
 RowBox[{"GR2011", "=", 
  RowBox[{"{", 
   RowBox[{
   "11.73", ",", " ", "11.4", ",", " ", "12.44", ",", " ", "13.86", ",", " ", 
    "15.94", ",", " ", "16.69", ",", " ", "16.15", ",", " ", "15.90", ",", 
    " ", "17.78", ",", "18.04", ",", " ", "17.92", ",", " ", "21.14"}], 
   "}"}]}]}], "Input",
 CellChangeTimes->{{3.544335168014*^9, 3.5443353126470003`*^9}, {
  3.544335666915*^9, 3.5443356999189997`*^9}, {3.5443357348929996`*^9, 
  3.544335736609*^9}, {3.544335770725*^9, 3.544335771354*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
  "6.02`", ",", "6.46`", ",", "6.24`", ",", "7.83`", ",", "7.97`", ",", 
   "9.1`", ",", "10.34`", ",", "10.7`", ",", "11.34`", ",", "9.57`", ",", 
   "11.52`", ",", "12.01`"}], "}"}]], "Output",
 CellChangeTimes->{3.544335701152*^9, 3.544335737352*^9, 3.544335773461*^9}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
  "11.73`", ",", "11.4`", ",", "12.44`", ",", "13.86`", ",", "15.94`", ",", 
   "16.69`", ",", "16.15`", ",", "15.9`", ",", "17.78`", ",", "18.04`", ",", 
   "17.92`", ",", "21.14`"}], "}"}]], "Output",
 CellChangeTimes->{3.544335701152*^9, 3.544335737352*^9, 3.544335773467*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"SK2010", "=", " ", 
  RowBox[{"{", 
   RowBox[{
   "4.11", ",", "4.08", ",", "4.01", ",", "3.93", ",", "3.82", ",", "3.73", 
    ",", "3.93", ",", "3.73", ",", "3.59", ",", "3.67", ",", "3.80", ",", 
    "4.06"}], "}"}]}], "\[IndentingNewLine]", 
 RowBox[{"SK2011", "=", 
  RowBox[{"{", 
   RowBox[{
   "4.16", ",", "4.24", ",", "4.32", ",", "4.33", ",", "4.33", ",", "4.39", 
    ",", "4.55", ",", "4.55", ",", "4.25", ",", "4.33", ",", "4.71", ",", 
    "5.21"}], "}"}]}]}], "Input",
 CellChangeTimes->{{3.544335967149*^9, 3.54433602762*^9}, {3.544337012316*^9, 
   3.5443370644639997`*^9}, 3.5443371155959997`*^9}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
  "4.11`", ",", "4.08`", ",", "4.01`", ",", "3.93`", ",", "3.82`", ",", 
   "3.73`", ",", "3.93`", ",", "3.73`", ",", "3.59`", ",", "3.67`", ",", 
   "3.8`", ",", "4.06`"}], "}"}]], "Output",
 CellChangeTimes->{3.544337120398*^9}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
  "4.16`", ",", "4.24`", ",", "4.32`", ",", "4.33`", ",", "4.33`", ",", 
   "4.39`", ",", "4.55`", ",", "4.55`", ",", "4.25`", ",", "4.33`", ",", 
   "4.71`", ",", "5.21`"}], "}"}]], "Output",
 CellChangeTimes->{3.5443371204049997`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[{
 RowBox[{"GR", "=", 
  RowBox[{"{", 
   RowBox[{
   "6.02", ",", "6.46", ",", "6.24", ",", "7.83", ",", "7.97", ",", "9.1", 
    ",", " ", "10.34", ",", " ", "10.70", ",", " ", "11.34", ",", " ", "9.57",
     ",", " ", "11.52", ",", "12.01", ",", "11.73", ",", " ", "11.4", ",", 
    " ", "12.44", ",", " ", "13.86", ",", " ", "15.94", ",", " ", "16.69", 
    ",", " ", "16.15", ",", " ", "15.90", ",", " ", "17.78", ",", "18.04", 
    ",", " ", "17.92", ",", " ", "21.14"}], "}"}]}], "\[IndentingNewLine]", 
 RowBox[{"DE", "=", 
  RowBox[{"{", 
   RowBox[{
   "3.26", " ", ",", " ", "3.17", ",", " ", "3.10", ",", " ", "3.06", ",", 
    " ", "2.73", ",", " ", "2.54", ",", " ", "2.62", ",", " ", "2.35", ",", 
    "2.30", ",", "2.35", ",", " ", "2.53", ",", " ", "2.91", ",", "3.02", ",",
     " ", "3.20", ",", " ", "3.21", ",", "3.34", ",", " ", "3.06", ",", " ", 
    "2.89", ",", " ", "2.74", ",", " ", "2.21", ",", " ", "1.83", ",", " ", 
    "2", ",", " ", "1.87", ",", " ", "1.93"}], "}"}]}], "\[IndentingNewLine]", 
 RowBox[{"SK", "=", 
  RowBox[{"{", 
   RowBox[{
   "4.11", ",", "4.08", ",", "4.01", ",", "3.93", ",", "3.82", ",", "3.73", 
    ",", "3.93", ",", "3.73", ",", "3.59", ",", "3.67", ",", "3.80", ",", 
    "4.06", ",", "4.16", ",", "4.24", ",", "4.32", ",", "4.33", ",", "4.33", 
    ",", "4.39", ",", "4.55", ",", "4.55", ",", "4.25", ",", "4.33", ",", 
    "4.71", ",", "5.21"}], "}"}]}]}], "Input",
 CellChangeTimes->{{3.544341515766*^9, 3.544341582198*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
  "6.02`", ",", "6.46`", ",", "6.24`", ",", "7.83`", ",", "7.97`", ",", 
   "9.1`", ",", "10.34`", ",", "10.7`", ",", "11.34`", ",", "9.57`", ",", 
   "11.52`", ",", "12.01`", ",", "11.73`", ",", "11.4`", ",", "12.44`", ",", 
   "13.86`", ",", "15.94`", ",", "16.69`", ",", "16.15`", ",", "15.9`", ",", 
   "17.78`", ",", "18.04`", ",", "17.92`", ",", "21.14`"}], "}"}]], "Output",
 CellChangeTimes->{3.544341584267*^9}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
  "3.26`", ",", "3.17`", ",", "3.1`", ",", "3.06`", ",", "2.73`", ",", 
   "2.54`", ",", "2.62`", ",", "2.35`", ",", "2.3`", ",", "2.35`", ",", 
   "2.53`", ",", "2.91`", ",", "3.02`", ",", "3.2`", ",", "3.21`", ",", 
   "3.34`", ",", "3.06`", ",", "2.89`", ",", "2.74`", ",", "2.21`", ",", 
   "1.83`", ",", "2", ",", "1.87`", ",", "1.93`"}], "}"}]], "Output",
 CellChangeTimes->{3.544341584277*^9}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
  "4.11`", ",", "4.08`", ",", "4.01`", ",", "3.93`", ",", "3.82`", ",", 
   "3.73`", ",", "3.93`", ",", "3.73`", ",", "3.59`", ",", "3.67`", ",", 
   "3.8`", ",", "4.06`", ",", "4.16`", ",", "4.24`", ",", "4.32`", ",", 
   "4.33`", ",", "4.33`", ",", "4.39`", ",", "4.55`", ",", "4.55`", ",", 
   "4.25`", ",", "4.33`", ",", "4.71`", ",", "5.21`"}], "}"}]], "Output",
 CellChangeTimes->{3.544341584285*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"DE2011", " ", "*", " ", "mes"}]], "Input",
 CellChangeTimes->{{3.544335111092*^9, 3.544335150663*^9}, {3.544335739549*^9,
   3.544335739741*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"3.02`", " ", "Jan"}], ",", 
   RowBox[{"3.2`", " ", "Feb"}], ",", 
   RowBox[{"3.21`", " ", "Mar"}], ",", 
   RowBox[{"3.34`", " ", "Apr"}], ",", 
   RowBox[{"3.06`", " ", "May"}], ",", 
   RowBox[{"2.89`", " ", "Jun"}], ",", 
   RowBox[{"2.74`", " ", "Jul"}], ",", 
   RowBox[{"2.21`", " ", "Aug"}], ",", 
   RowBox[{"1.83`", " ", "Sep"}], ",", 
   RowBox[{"2", " ", "Oct"}], ",", 
   RowBox[{"1.87`", " ", "Nov"}], ",", 
   RowBox[{"1.93`", " ", "Dec"}]}], "}"}]], "Output",
 CellChangeTimes->{{3.544335116642*^9, 3.54433515137*^9}, 
   3.5443357409449997`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"DE2011", ",", " ", "DE2012"}]], "Input",
 CellChangeTimes->{{3.544336037135*^9, 3.5443360800699997`*^9}, {
  3.544340593197*^9, 3.544340595428*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{
    "3.02`", ",", "3.2`", ",", "3.21`", ",", "3.34`", ",", "3.06`", ",", 
     "2.89`", ",", "2.74`", ",", "2.21`", ",", "1.83`", ",", "2", ",", 
     "1.87`", ",", "1.93`"}], "}"}], ",", 
   RowBox[{"{", 
    RowBox[{
    "3.02`", ",", "3.2`", ",", "3.21`", ",", "3.34`", ",", "3.06`", ",", 
     "2.89`", ",", "2.74`", ",", "2.21`", ",", "1.83`", ",", "2", ",", 
     "1.87`", ",", "1.93`"}], "}"}]}], "}"}]], "Output",
 CellChangeTimes->{3.544336070359*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"GR2011", " ", "*", "  ", "mes"}]], "Input",
 CellChangeTimes->{{3.544335707045*^9, 3.544335711659*^9}, {3.544335751234*^9,
   3.544335751574*^9}, {3.544335800271*^9, 3.5443358214779997`*^9}, {
  3.544335860943*^9, 3.54433587744*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{
   RowBox[{"11.73`", " ", "Jan"}], ",", 
   RowBox[{"11.4`", " ", "Feb"}], ",", 
   RowBox[{"12.44`", " ", "Mar"}], ",", 
   RowBox[{"13.86`", " ", "Apr"}], ",", 
   RowBox[{"15.94`", " ", "May"}], ",", 
   RowBox[{"16.69`", " ", "Jun"}], ",", 
   RowBox[{"16.15`", " ", "Jul"}], ",", 
   RowBox[{"15.9`", " ", "Aug"}], ",", 
   RowBox[{"17.78`", " ", "Sep"}], ",", 
   RowBox[{"18.04`", " ", "Oct"}], ",", 
   RowBox[{"17.92`", " ", "Nov"}], ",", 
   RowBox[{"21.14`", " ", "Dec"}]}], "}"}]], "Output",
 CellChangeTimes->{
  3.544335712428*^9, {3.544335752561*^9, 3.5443358106619997`*^9}, {
   3.544335857446*^9, 3.544335870849*^9}, 3.544335952391*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"ListLinePlot", "[", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{"DE2010", ",", "GR2010", ",", "SK2010"}], "}"}], ",", 
   RowBox[{"AxesOrigin", "\[Rule]", 
    RowBox[{"{", 
     RowBox[{"0", ",", "0"}], "}"}]}], ",", 
   RowBox[{"Axes", "\[Rule]", "True"}], ",", " ", 
   RowBox[{"AxesLabel", "\[Rule]", " ", 
    RowBox[{"{", 
     RowBox[{"mesiac", ",", "miera"}], "}"}]}], ",", " ", 
   RowBox[{
   "PlotLabel", "\[Rule]", " ", "\"\<Urokove miery v roku 2010\>\""}]}], "]"}]
  ], "Input",
 CellChangeTimes->{{3.544337244573*^9, 3.544337246993*^9}, {3.544337283868*^9,
   3.544337296527*^9}, {3.5443373315769997`*^9, 3.544337336948*^9}, {
  3.544337416737*^9, 3.544337461391*^9}, {3.544337560363*^9, 
  3.5443375718199997`*^9}, {3.544337804914*^9, 3.5443378297130003`*^9}, {
  3.544337912677*^9, 3.544338028448*^9}, {3.544341613477*^9, 
  3.544341613809*^9}}],

Cell[BoxData[
 GraphicsBox[{{}, {}, 
   {Hue[0.67, 0.6, 0.6], 
    LineBox[{{1., 3.26}, {2., 3.17}, {3., 3.1}, {4., 3.06}, {5., 2.73}, {6., 
     2.54}, {7., 2.62}, {8., 2.35}, {9., 2.3}, {10., 2.35}, {11., 2.53}, {12.,
      2.91}}]}, 
   {Hue[0.9060679774997897, 0.6, 0.6], 
    LineBox[{{1., 6.02}, {2., 6.46}, {3., 6.24}, {4., 7.83}, {5., 7.97}, {6., 
     9.1}, {7., 10.34}, {8., 10.7}, {9., 11.34}, {10., 9.57}, {11., 11.52}, {
     12., 12.01}}]}, 
   {Hue[0.14213595499957954`, 0.6, 0.6], 
    LineBox[{{1., 4.11}, {2., 4.08}, {3., 4.01}, {4., 3.93}, {5., 3.82}, {6., 
     3.73}, {7., 3.93}, {8., 3.73}, {9., 3.59}, {10., 3.67}, {11., 3.8}, {12.,
      4.06}}]}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesLabel->{
    FormBox["mesiac", TraditionalForm], 
    FormBox["miera", TraditionalForm]},
  AxesOrigin->{0, 0},
  PlotLabel->FormBox["\"Urokove miery v roku 2010\"", TraditionalForm],
  PlotRange->{{0., 12.}, {0, 12.01}},
  PlotRangeClipping->True,
  PlotRangePadding->{
    Scaled[0.02], 
    Scaled[0.02]}]], "Output",
 CellChangeTimes->{
  3.544337247815*^9, 3.54433728741*^9, 3.544337337742*^9, {3.544337423375*^9, 
   3.544337462473*^9}, 3.544337572613*^9, 3.544337830826*^9, {
   3.5443379508310003`*^9, 3.544337996152*^9}, 3.544338030086*^9, 
   3.5443416149449997`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"ListPlot", "[", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{"DE2010", ",", "GR2010", ",", "SK2010"}], "}"}], ",", 
   RowBox[{"AxesOrigin", "\[Rule]", 
    RowBox[{"{", 
     RowBox[{"0", ",", "0"}], "}"}]}], ",", 
   RowBox[{"Axes", "\[Rule]", "True"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.5443377070559998`*^9, 3.544337707658*^9}}],

Cell[BoxData[
 GraphicsBox[{
   {Hue[0.67, 0.6, 0.6], 
    PointBox[{{1., 3.26}, {2., 3.17}, {3., 3.1}, {4., 3.06}, {5., 2.73}, {6., 
     2.54}, {7., 2.62}, {8., 2.35}, {9., 2.3}, {10., 2.35}, {11., 2.53}, {12.,
      2.91}}]}, 
   {Hue[0.9060679774997897, 0.6, 0.6], 
    PointBox[{{1., 6.02}, {2., 6.46}, {3., 6.24}, {4., 7.83}, {5., 7.97}, {6.,
      9.1}, {7., 10.34}, {8., 10.7}, {9., 11.34}, {10., 9.57}, {11., 11.52}, {
     12., 12.01}}]}, 
   {Hue[0.14213595499957954`, 0.6, 0.6], 
    PointBox[{{1., 4.11}, {2., 4.08}, {3., 4.01}, {4., 3.93}, {5., 3.82}, {6.,
      3.73}, {7., 3.93}, {8., 3.73}, {9., 3.59}, {10., 3.67}, {11., 3.8}, {
     12., 4.06}}]}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesOrigin->{0, 0},
  PlotRange->Automatic,
  PlotRangeClipping->True]], "Output",
 CellChangeTimes->{3.544337708342*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"ListLinePlot", "[", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{"DE2010", ",", "GR2010", ",", "SK2010"}], "}"}], ",", 
   RowBox[{"Axes", "\[Rule]", "True"}], ",", " ", 
   RowBox[{"InterpolationOrder", "\[Rule]", " ", "2"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.544337506572*^9, 3.544337516363*^9}}],

Cell[BoxData[
 GraphicsBox[{{}, {}, 
   {Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJw11glQE2cUB3DY3YTdgBQh3FfuRGtbGfFA0fytjooXgko9EFSKYr0vUEpF
8CpKPUYRcWpVDi1qRdQOiIyiI1aU6mjLodJUq1SxKAriUdQ2hPftJJPZ2S/f
937vvbyJevbiyHjOzs5uu/Xd+dl1PTe7Hx95P1mpQLHbIOvrhbl/ef+pix0V
mG1MtL5azYdjGuTe9gooOx8Xt5njs/o+SWqXUDm++dL45pfmpTOH8ZmPJSTa
vvDKXH1eFjn5jgTb12e/Nq84lVL721UJtzP21Wfse2M+oHY2DCqTsLnztv6t
OWux/4WKQgm27d06zJnrXAbvyZHQuful8e/Ma2c8yrmQIeGHzuUZ783L3x+s
C02WEG5b8MGcEIdX0nwJBML0bRfbTdHsPDuMSzPV5oyTyGcPc8iy7GgzO98e
QSX7Q5YGSYizBcxB03GivE7L4uHhKjuk2u4hkZ8HV7Mmfq/E4hMwvHLNGI/3
IuVDwOW2kEkXX4gUrwy1ZW3mc49Eyo8cq32OOSv+FCl+OYpc4yoK6kSYbAsc
sDLPa/KOmyJ5RFyv7rxE8ogo2ZpqnFIlkkdCUFPv+D6/iOSRMKTh3oaYyyLV
T4G7c7dl3Lbed3kcocgMXZJ/RSSPI6pGPQ45f00kjxNk/VfXRN1gHieENEc1
rLouwrZ9RjdMsE8YHHmFeZwxKvHYm7/KRdiWX3KGeozO+eNjItX/I1hSb3zT
czfzuCBF2dlw7DwXdIgV88OnibBtv88FMTNkT1YEs/NdkNd9zcUIiXm7o0rf
s72x3oHi6Y5bOVJ6UJ4D+bujfKHfvOAEB4rPFbxL/q57JgfKhyuSPXuk338i
p/y7Yl9rs2+PIjnlxw0LDrbMKlkpp/jd0KgNmpQ5RE75coOUXNx6WJKTR4m6
vCWDFXUy8igReXBR8KlDMqqXEquWHa3LXSUjjxKjPI3G22Nl5HFH5bb7miit
jPrFHc1371z1fieQxx3nOlwDdXUCeTxQpaopunVaoH71wNwVDy1R2QJ5PKA1
ZYY6pwrk8YRdaPWVN/MF6i9PvCvKX+cRI5DHE17r3RfOnSyQxwuRpQEb/okQ
8NTm8cLxsRXXcicK5PGCaei/+G6aQB4vXMyqfnhkjkAeb3wzun9JR5JAHm9E
xQ4sTd3KPN4I/73mUb8jzOOD0Y4LR+yoEqg+PsgKn1T76QPm8YEr35Kd2s48
vqjQD96yzk5G9fHFgZIhJwYKMtiOL/bFydI2eYH1eZfHD69M0daJIFB9/LBA
XBW207p/V7/5we2LkX09rzKPH5qVVyPHFzKPP94MtcsdkCZQv/mjr6VJUxvB
PP7Ib9pYY/BlngAoLTfLCi08eQIQu7uwfkoBT54ATM4Ue59awpMnEG3nn1WU
gidPIEKDorfMc+epPoHofW/CtspnHHlU+NU2Dzg6TwWP1zeGpRZx5FNBjJ32
smE3R+erUCAssDSmc1Q/FZ4+Eri9yzmKRwWLqI99m8CRX4XkudXtfBxH8anh
dv6s84BZHOVDjf3Lk2K2zOQoXjUWo+KTFOt9V73VWK/fnaKwru+KX417mrej
+83mKF9qrB3QtOe/OObRYI7tYh4Nth9bcuqrecyjgb2juNZpIUf9rsHPab2q
xyxlHg2KXSzZpkTm0eBFid+D3K+ZR4PEpMc/laUxjxb1ykHvNn7LPFrkB7U0
7tjO0e9DixU7PyxqzWEeLUYMnJf9Yz7zaOFj+Cz29Anm0aItasJl93PMo6N5
zTw6HN2Uv+x2A0e/Jx02b6orGfSMeXSYXx3/fZsdTx4dIqLCVfburF90GKDf
NezLnjx5dNCEBMv9h7L+0SPKqZ/32qk8Tto8emxIqcjNWMmTR482/s7ErVk8
efQoyE3vtfUM6y89sqeU9cq4z5NHjyv6tEmp3dg8MGCIonPCCUiyeQxolZX7
zFjK5oMBTV69zwwvZPPIgMBhfVKNjWxeGLBnfeUCmV5GHgMi/vg7zZLA5qEB
48Zlnzt5QkYeI/JT7qhHdbD5aETL9MsFnw+Vk8eIsJ0xYQlpcvIYUazJczpz
ls1nI3oodrUEP5eTx/o8LKj1boADeUwIs/7bOT7SAf8DmiubZQ==
     "]]}, 
   {Hue[0.9060679774997897, 0.6, 0.6], LineBox[CompressedData["
1:eJw11QtUU3UcB3BQUGLy3JCNsd1t94UWJoeOilL364MMNAoNSbGOUb7yEShJ
ioIdQyETUTEVmw3xlRUFKigZGZIWlaRGI1QQj5rhC9AhKc7G5XfvuTs79+z/
+H1+v99/15zy3pTZ/dzc3Apcn97vvqtd0pRObF2h0aJMPcZ1d0hf/vB0u2ek
FiniMtfdKfnOGe5+J1ELTe/PZfek54sTNZGrtPgp/lZt/K370qi0nUMaDmix
TJ7QJbn95T72z0Yt5OkpD6TC+twZw310+DvP2phn7ZamvfSGY8QEHT7ufWz8
T9pa/cmgY0t1kJdXP5IOhU5gPIp06F29Nr5HKk1ZE66t1GFX7/C8x9LagriR
jjodXpEHOCVp347onQ06EAh/laQ+721X9nNDXF591Lh6HfncYZ1WETG+Wtnf
HWdUPO+zR4e35YD7ofmAXmNbrcTTH7+FFzkfTdWRvz+2FdmumoxKfB54Ut6y
bssVJR8eWO6zcklqhZbi9cSJRcKcaKuSnwFoPN+c8uBTLcU/AD9Ie+cVl2gR
Jg8YiPSy5RmjT2rJ44WusJkbaxxa8nghdt/kb6PGKJ6nMH/IpKbPtyiep5Bc
nuTjcOqoft7QjV0SG7UqhDwq7Gsoyl/oqyePCu6pZy/ml+vJMwjLp9pWh88O
Jc8gnFPHxGxXGSAvn+eD5PuxGTOLDeTxRYCjdPAKwQh5eK0vuoPS2Y4iI9Xf
D75JO6w/Oo3k8UfCUWPOzQSG9vPHySiPpsWFDOTlrf5IuRD72aRTDO3vj+HW
u79++A9D3gAMy3bMC+hmKJ4ATP8weenDBwz5A3CoxHwz2jW+L75AdOUn5oz/
haF8BGLxyNjV+eUM5T8QjTHem3L3MZQfNSKqtldG7GUofjUyC+/fyytlKF9q
HPnT8OKmGoY8Glxe0XuCFI8Gq8bf2jrN00T10mBNz+GWWYyJPBqsnvfO4ZoX
TOQJQsa6h+qVb5uoX4Iwe3qG85MNJvIEYVJz01LHcRN5BmP3nOggdYeJ+nUw
xjSIXwQLZvIMRsGKw3/MSjaTJxi2aVfW3ykwU38F4935ZU0nTpnJE4z2cvP3
9h4zebSIlC8LbsseLSLarkWfn28hjxY37FFNlTYLebSY0TNM1Wq3kEeH3KSf
6uP9WPLokPZvj+g+kSWP6xyVN6i7s1jyhCA48257cQVL9QlBnNOro7CNJU8I
Ejxr0qQQjjx6DC0IWVocw1F99LDvCnRULeQgb1+mx/SIgw/Wb+TIEwr5762U
o/qEwt5amfXazxz1WyjOPgnvP7mZI08obMXjvR7d5chjwITT3RveesxRvxnw
XerLhdkDePIY4LFrrD5RxZPHiJNBuVl3BvHkMeK77ISrWwN48hiRv/vVA0kh
PHkYjM7KqYsUefIwqA1sjxs6iqf6uPpwVsGQMS/z5DFhjnwp+5mQzS9x/2oN
Tz4TllgPPVTtVfY3QTozdMraOp7qZ0JbpX2g/r4SjwmLZlTp68wC+U34/ci5
DVumChSfGeFszUfj1gmUDzPSj716Y8c3AsVrRt1ZpuWdOoHq7Rq/8Nn5JXaB
4jfDlpu9NtH13JcvM0yi/8jMXwTyWPCNXB+BPBbEtXUmmHME8ljg8I05Xhwv
UL9b8PUR+7Gt3gJ5LHi/+WDc46OKxzU/r3px43SePBYMqwgUxNtK/7CoirnZ
em+ZUl8W2zJbYlf5cXQ+WLw5KrL+9yqlf1n4rbyedu0Dljwsvnrxv4jaWKWf
WURuX+D3bjhLHg57el8/rNLfHNz/WGxRuX7vO08cYiueJA1wze/zcMhk2w/+
nMGSh8OOYOinHFP6n4Nt890Du32U/uSwudA5tSpd8fBgcto2m29yKJc9POae
K3lGNZMnD4/gq/u3PTnJk4fHc1Vd550WpT48jr9W0Oq1XKkPj68PpZ8wnFLq
I8Db3vtCFZEhewTUVxs658aI5HGNW3BlgjVDJI+A7Rc65l2yieRx9YX/5DfD
fhTJI8DHu4PLahTJI+D66cvHm6+L5BHxMPd0evJtkeojgj9Vys3sFMkjYkT1
OH1nl0geEc+mrXnd8EgkjwjfltSLl5wieUTYB6r2R/YLI08YXC+fo0bPMPwP
kX+zjg==
     "]]}, 
   {Hue[0.14213595499957954`, 0.6, 0.6], LineBox[CompressedData["
1:eJxVlXlMVFcUxgdkZ94CwzKss8JgVXBXRJ0Px40KYlFbXBAERVFG3Kp1q0FF
i1BA04pCpFULKFgsaq1pRFoFiiyiVRSNoqmmkgoN4L6RwuOeP/ryXl5e3r33
nN/5vnOvJj4laqmlTCbL6X363v1Xp3HNBIfbx1aLKFeE9N5dxqzii+O3pIiI
N2zovbuNPmdMpoBVIlz6fpc/M/rEHfqnJFlE9cz2qpntz405ZZXDB6wUsUGa
8NK4vuCc17AkEdL0+FfGK0FfFo5cJuJO+uGW9MOvjRnN64vsl4rY2/fZ8sa4
L/S6PjdehLS84p2x+e+uly2xIvpWr5r53vhp9S3vpoUiCvqGp38wut3ffmDT
PBGR0oAeo2tgR0LLXBEMCFHnfdOefkLxZGjY4vL2dATxWWDXF1cvBYZRfAts
KQt/sGiyiAQpYUuU+2RHmoyUzwDoar5V3Asm/gG4WRw3aOBIys8KCZdquZGB
VA8r5Cge7xwVQPla421ehtUYLdXHBkejK7PHelP+NtgTvt1vnJuIAGmALUo2
1FeHiMRjhz51JjgQjx2Om+38jVbEYw/rz7vrU98LjMceY7e0x6V1Ckw/Bzzu
6HFIfywwHkc4Ng6sy2wRGI8jypTmgpwGgfHIsbMmdf5XvwmMR46bByv+/eis
AGn5dA7z0u4MSS4WGA8P58xm9/A8AdLwKh49J8tP1mUKTH8Bvm3m9idfCoxH
xFrJbxRPxJuTu5N7FguQlj8s4uzoRydfRVF8EUfvqg5mmwTG64Sag+MDa0ZQ
Pk7wWhOckq8jficUJbgtEBSUnzMq1zvYeVpSPZyRejH2XUYnz+rvjOlTImbE
tPKsPgoo7G+8+rqeZ/kr8Mi+S+Z7nmf1UuCXacWJ3A8843FB9qUXAQuzecbj
guTN96Y5bOaZXi6ITFlw2X0Jz3hcMOrI2vxdETzjcYVa1F6bNZpnfnGFeCFp
8VZfnvG4wqowLNLWhmc8bjA3aGJrOzjmVzc8Gzd8WO1djvG4wab77t77jRzj
cUdRl1ey3R8c85c7bgS/uDm9hmM87siuS6wuqOcYjxItfXa7zaFD4lHiVLXz
hIw2jvEo4TQ0okojIx4lLB+pbjT6EI8HUlv3JmWHEo8HMrRZexJXEo8HtKcG
DpmdTzyeuGCbOymviWf6eMIqNCj4zgfSxxMprYPezNGTf73w7kHmDs5E/vJC
6ZSoZsv5AqTw5V7YKmztGplEfvPGmv/5zRt7mt6nRa4mv3mjsnp2z5jl5Ddv
eKgFxEST33yQ2xo4oxLkNx+MsTijWqQhv/ngzZ78iuC3xOMLW7vC6NQG4vFF
rCzEMOs74vHFQBvPmOZ15DcVlnlMeit+TH5TQTnuTI+llvymwsTl5hWl70gf
NW4zffrjqfG4/cJG1VmO8amRYIryeLqfY/HV+Kx4qNa8jvRTo1IZvb9wLvlF
jfzc2qRvgjnGr0abbsfxYBX5R4Ozz0Im1tpwrB4aDJsRemVNl5zlq4E5Liw4
6YGc6a3BkhFzssquyVn+GnhULa4NrZazemmw13ntE22FnPFoIW3X5+WMR4sj
bXk3r56TMx4twlafOXqo93+/37Uo/fnq3NO98/t5tGg8396hrJEzHi1ObOJW
Nl6XMx4tTK+HNjY9lDMeHVwHz/v+VLec8egg+2vf4Dor6g8dUp3ufyhz4xiP
Drm/jnNZFED9ooPpfknK7d569fPokLZpiOg1g/TRI0baEEgfPep8V6gtzNRP
etQb9DnHtlH/6pFQ0jlZzCJ99Nhf1DRxWgHpo8ds79+3TS8jffQoday2cLlI
+vihakBgkMNVDqclHj/kxz6NNT8kHj9El0W+PvyCePwg65z/Op8jf/khS8/F
LQug/vSDdXhikGwq7W/+SJQuHhslHn/8uI6zzkvnGY8/WtctcMw/xTMef7xI
nLUpqYX2P3+8Cm+faW0lMB5/PPALylw1nPrNH+VdymGFCdTfBsRNrdjddID6
z4ATxftMN2oExmNAaumJn251C4zHgOfHLZ8kc3Q+G5AS8WfEKhWd7wYMv3w5
MyWIztMASNvBBBH/AQtPkJA=
     "]]}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesOrigin->{0, 4.},
  PlotRange->{{0., 12.}, {2.2971118521018563`, 12.01}},
  PlotRangeClipping->True,
  PlotRangePadding->{
    Scaled[0.02], 
    Scaled[0.02]}]], "Output",
 CellChangeTimes->{3.544337517241*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"ListLinePlot", "[", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{"DE2011", ",", "GR2011", ",", "SK2011"}], "}"}], ",", 
   RowBox[{"AxesOrigin", "\[Rule]", 
    RowBox[{"{", 
     RowBox[{"0", ",", "0"}], "}"}]}], ",", 
   RowBox[{"Axes", "\[Rule]", "True"}], ",", " ", 
   RowBox[{"AxesLabel", "\[Rule]", " ", 
    RowBox[{"{", 
     RowBox[{"mesiac", ",", "miera"}], "}"}]}], ",", " ", 
   RowBox[{
   "PlotLabel", "\[Rule]", " ", "\"\<Urokove miery v roku 2011\>\""}]}], 
  "]"}]], "Input",
 CellChangeTimes->{{3.544341599389*^9, 3.544341604716*^9}}],

Cell[BoxData[
 GraphicsBox[{{}, {}, 
   {Hue[0.67, 0.6, 0.6], 
    LineBox[{{1., 3.02}, {2., 3.2}, {3., 3.21}, {4., 3.34}, {5., 3.06}, {6., 
     2.89}, {7., 2.74}, {8., 2.21}, {9., 1.83}, {10., 2.}, {11., 1.87}, {12., 
     1.93}}]}, 
   {Hue[0.9060679774997897, 0.6, 0.6], 
    LineBox[{{1., 11.73}, {2., 11.4}, {3., 12.44}, {4., 13.86}, {5., 15.94}, {
     6., 16.69}, {7., 16.15}, {8., 15.9}, {9., 17.78}, {10., 18.04}, {11., 
     17.92}, {12., 21.14}}]}, 
   {Hue[0.14213595499957954`, 0.6, 0.6], 
    LineBox[{{1., 4.16}, {2., 4.24}, {3., 4.32}, {4., 4.33}, {5., 4.33}, {6., 
     4.39}, {7., 4.55}, {8., 4.55}, {9., 4.25}, {10., 4.33}, {11., 4.71}, {
     12., 5.21}}]}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesLabel->{
    FormBox["mesiac", TraditionalForm], 
    FormBox["miera", TraditionalForm]},
  AxesOrigin->{0, 0},
  PlotLabel->FormBox["\"Urokove miery v roku 2011\"", TraditionalForm],
  PlotRange->{{0., 12.}, {0., 21.14}},
  PlotRangeClipping->True,
  PlotRangePadding->{
    Scaled[0.02], 
    Scaled[0.02]}]], "Output",
 CellChangeTimes->{3.544341619197*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"popis", "=", " ", 
  RowBox[{"{", 
   RowBox[{
   "\"\<Jan2010\>\"", ",", "\"\<Feb2010\>\"", ",", "\"\<Mar2010\>\"", ",", 
    "\"\<Apr2010\>\"", ",", "\"\<May2010\>\"", ",", "\"\<Jun2010\>\"", ",", 
    "\"\<Jul2010\>\"", ",", "\"\<Aug2010\>\"", ",", "\"\<Sep2010\>\"", ",", 
    "\"\<Oct2010\>\"", ",", "\"\<Nov2010\>\"", ",", "\"\<Dec2010\>\"", ",", 
    "\"\<Jan2011\>\"", ",", "\"\<Feb2011\>\"", ",", "\"\<Mar2011\>\"", ",", 
    "\"\<Apr2011\>\"", ",", "\"\<May2011\>\"", ",", "\"\<Jun2011\>\"", ",", 
    "\"\<Jul2011\>\"", ",", "\"\<Aug2011\>\"", ",", "\"\<Sep2011\>\"", ",", 
    "\"\<Oct2011\>\"", ",", "\"\<Nov2011\>\"", ",", "\"\<Dec2011\>\""}], 
   "}"}]}]], "Input",
 CellChangeTimes->{{3.544342104407*^9, 3.54434224487*^9}}],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"\<\"Jan2010\"\>", ",", "\<\"Feb2010\"\>", ",", "\<\"Mar2010\"\>", 
   ",", "\<\"Apr2010\"\>", ",", "\<\"May2010\"\>", ",", "\<\"Jun2010\"\>", 
   ",", "\<\"Jul2010\"\>", ",", "\<\"Aug2010\"\>", ",", "\<\"Sep2010\"\>", 
   ",", "\<\"Oct2010\"\>", ",", "\<\"Nov2010\"\>", ",", "\<\"Dec2010\"\>", 
   ",", "\<\"Jan2011\"\>", ",", "\<\"Feb2011\"\>", ",", "\<\"Mar2011\"\>", 
   ",", "\<\"Apr2011\"\>", ",", "\<\"May2011\"\>", ",", "\<\"Jun2011\"\>", 
   ",", "\<\"Jul2011\"\>", ",", "\<\"Aug2011\"\>", ",", "\<\"Sep2011\"\>", 
   ",", "\<\"Oct2011\"\>", ",", "\<\"Nov2011\"\>", ",", "\<\"Dec2011\"\>"}], 
  "}"}]], "Output",
 CellChangeTimes->{3.544342246278*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"ListLinePlot", "[", 
  RowBox[{
   RowBox[{"{", 
    RowBox[{"DE", ",", "GR", ",", "SK"}], "}"}], ",", 
   RowBox[{"AxesOrigin", "\[Rule]", 
    RowBox[{"{", 
     RowBox[{"0", ",", "0"}], "}"}]}], ",", 
   RowBox[{"Axes", "\[Rule]", "True"}], ",", " ", 
   RowBox[{"AxesLabel", "\[Rule]", " ", 
    RowBox[{"{", 
     RowBox[{"mesiac", ",", "miera"}], "}"}]}], ",", " ", 
   RowBox[{"PlotLabel", "\[Rule]", 
    RowBox[{"Style", "[", " ", 
     RowBox[{"\"\<Urokov\[EAcute] miery\>\"", ",", "Bold", ",", " ", "15"}], 
     "]"}]}], ",", " ", 
   RowBox[{"Ticks", "\[Rule]", "Automatic"}]}], "]"}]], "Input",
 CellChangeTimes->{{3.5443416244040003`*^9, 3.544341634723*^9}, {
  3.544341774748*^9, 3.544341811326*^9}, {3.544341858859*^9, 
  3.5443418617720003`*^9}, {3.544341956553*^9, 3.544341995278*^9}, {
  3.5443420388050003`*^9, 3.544342102336*^9}, {3.5443422606610003`*^9, 
  3.544342295517*^9}}],

Cell[BoxData[
 GraphicsBox[{{}, {}, 
   {Hue[0.67, 0.6, 0.6], LineBox[CompressedData["
1:eJxTTMoPSmViYGCQAGIQDQEf7EXWuT+sEuFygAo4xPQf+qoRwwnlczicPQMC
HFC+gEM1WAOML+JwfXGBLdd1VihfwiFoh1zr60AWKF/G4ZsGyEQYXwFqHhOU
r+SQBgYwvgqavJoD0HCgDTD9Gg4eQNeuc2eH8rUcNMEOhrlHx2HWTBCAuV/P
Aey9dTC+gQPYeTtg/jVE84+RgzxIWg5mvrHDm0CQDpj/TKDmMUL5plD3/LWH
8M3g4QihzKH6YfIWDmDlD//ZAwCKgmAg
     "]]}, 
   {Hue[0.9060679774997897, 0.6, 0.6], LineBox[CompressedData["
1:eJxTTMoPSmViYGCQAGIQDQEf7EXWuT+sEpFwgAo4XF9cYMt1XRLK53D4phHT
f+grTF7AIWiHXOvrQHkoX8QBqBloAowv4WAMBkpQvowD2Ph1KlC+gkMaGKhC
+UpQeTUoX8VhCch6ZWUoX82BC+wgdShfwwFo+Q45Vg0oXwvivlKYvI7D2TMg
ADNPD+o+mHoDB7Dzd2hD+YZQeX0o38ihEGj94g0GUL4xxL1qML4J1HyYelMH
D5ABxw2hfDOoe42gfHOHN4EgG2HyFlD/mToAAOQYXRY=
     "]]}, 
   {Hue[0.14213595499957954`, 0.6, 0.6], LineBox[CompressedData["
1:eJxTTMoPSmViYGCQAGIQDQEf7Attua4vLhBwgAo4BO2Qa30dCONzOIBkbblg
fAEHiHp+KF/Eof/QV42Yfj4oX8IBrPw6L5Qvg6ZeAU1eyQFs3Q4eKF/FIQZs
IExezSENDGDmaziAjbOFuUfLYQnIuMUwvo7DNw2QCTC+noPHwyqRde6CUL4B
1H8wviEa3wjqHxjf2MEYDISgfBM0vimUhqk3QzPPHOpfmHoLKF/EAQAxH1Mh

     "]]}},
  AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
  Axes->True,
  AxesLabel->{
    FormBox["mesiac", TraditionalForm], 
    FormBox["miera", TraditionalForm]},
  AxesOrigin->{0, 0},
  PlotLabel->FormBox[
    StyleBox["\"Urokov\[EAcute] miery\"", Bold, 15, StripOnInput -> False], 
    TraditionalForm],
  PlotRange->{{0., 24.}, {0, 21.14}},
  PlotRangeClipping->True,
  PlotRangePadding->{
    Scaled[0.02], 
    Scaled[0.02]}]], "Output",
 CellChangeTimes->{3.544342080888*^9, {3.544342251388*^9, 3.544342296934*^9}}]
}, Open  ]]
},
WindowSize->{1176, 709},
WindowMargins->{{-88, Automatic}, {Automatic, 0}},
FrontEndVersion->"8.0 for Microsoft Windows (32-bit) (November 7, 2010)",
StyleDefinitions->"Default.nb"
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[CellGroupData[{
Cell[579, 22, 665, 13, 72, "Input"],
Cell[1247, 37, 233, 4, 30, "Output"],
Cell[1483, 43, 233, 4, 30, "Output"],
Cell[1719, 49, 387, 8, 30, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2143, 62, 724, 15, 52, "Input"],
Cell[2870, 79, 344, 8, 30, "Output"],
Cell[3217, 89, 336, 8, 30, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[3590, 102, 805, 16, 52, "Input"],
Cell[4398, 120, 312, 6, 30, "Output"],
Cell[4713, 128, 319, 6, 30, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[5069, 139, 642, 14, 52, "Input"],
Cell[5714, 155, 270, 6, 30, "Output"],
Cell[5987, 163, 276, 6, 30, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[6300, 174, 1500, 27, 92, "Input"],
Cell[7803, 203, 460, 8, 30, "Output"],
Cell[8266, 213, 440, 8, 30, "Output"],
Cell[8709, 223, 446, 8, 30, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[9192, 236, 169, 3, 31, "Input"],
Cell[9364, 241, 615, 16, 30, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[10016, 262, 172, 3, 31, "Input"],
Cell[10191, 267, 530, 13, 30, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[10758, 285, 257, 4, 31, "Input"],
Cell[11018, 291, 693, 17, 30, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[11748, 313, 883, 20, 31, InheritFromParent],
Cell[12634, 335, 1331, 30, 256, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[14002, 370, 359, 9, 31, "Input"],
Cell[14364, 381, 866, 19, 242, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[15267, 405, 325, 7, 31, "Input"],
Cell[15595, 414, 6920, 122, 236, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[22552, 541, 573, 15, 31, "Input"],
Cell[23128, 558, 1121, 26, 256, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[24286, 589, 763, 13, 52, "Input"],
Cell[25052, 604, 699, 11, 50, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[25788, 620, 924, 21, 52, "Input"],
Cell[26715, 643, 1599, 37, 258, "Output"]
}, Open  ]]
}
]
*)

(* End of internal cache information *)
